home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 October: Mac OS SDK / Dev.CD Oct 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / OCEStandardDirectory.a < prev    next >
Encoding:
Text File  |  1997-08-12  |  26.6 KB  |  959 lines  |  [TEXT/MPS ]
  1. ;
  2. ;    File:        OCEStandardDirectory.a
  3. ;
  4. ;    Contains:    Apple Open Collaboration Environment Standard Directory Interfaces.
  5. ;
  6. ;    Version:    Technology:    AOCE Toolbox 1.02
  7. ;                Release:    Universal Interfaces 3.0.1
  8. ;
  9. ;    Copyright:    © 1994-1997 by Apple Computer, Inc., all rights reserved.
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__OCESTANDARDDIRECTORY__') = 'UNDEFINED' THEN
  19. __OCESTANDARDDIRECTORY__ SET 1
  20.  
  21.     IF &TYPE('__ICONS__') = 'UNDEFINED' THEN
  22.     include 'Icons.a'
  23.     ENDIF
  24.     IF &TYPE('__TYPES__') = 'UNDEFINED' THEN
  25.     include 'Types.a'
  26.     ENDIF
  27.     IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
  28.     include 'Quickdraw.a'
  29.     ENDIF
  30.  
  31.     IF &TYPE('__OCE__') = 'UNDEFINED' THEN
  32.     include 'OCE.a'
  33.     ENDIF
  34.     IF &TYPE('__OCEAUTHDIR__') = 'UNDEFINED' THEN
  35.     include 'OCEAuthDir.a'
  36.     ENDIF
  37.  
  38.  
  39. ;  generic icon suites 
  40.  
  41. genericDirectoryIconResource    EQU        -16721                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  42. genericLockedDirectoryIconResource EQU    -16716                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  43. genericRecordIconResource        EQU        -16722                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  44. genericAttributeIconResource    EQU        -16723                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  45. genericTemplateIconResource        EQU        -16746                ; icl8, icl4, ICN#, ics#, ics4, ics8 
  46.  
  47. ;  standard icon suites 
  48.  
  49. directoryFolderIconResource        EQU        -16720                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  50. lockedDirectoryFolderIconResource EQU    -16719                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  51. personalDirectoryIconResource    EQU        -16718                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  52. directoriesIconResource            EQU        -16717                ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  53. preferredPersonalDirectoryIconResource EQU -16724            ; icl8, icl4, ICN#, ics#, ics4, ics8, sicn  
  54. ;  icon IDs for spinning arrows 
  55.  
  56. kFirstSpinnerIcon                EQU        -16745
  57. kLastSpinnerIcon                EQU        -16738
  58. ;  resource types 
  59.  
  60. kSDPPanelResourceType            EQU        'panl'
  61. kSDPFindPanelResourceType        EQU        'find'
  62. ;  Standard FindPanel resource 
  63.  
  64. kStandardFindLayout                EQU        -16700
  65. ;  Prompt For Identity structures 
  66.  
  67. kSDPGuestBit                    EQU        0
  68. kSDPSpecificIdentityBit            EQU        1
  69. kSDPLocalIdentityBit            EQU        2
  70. ;  Values of SDPIdentityKind 
  71.  
  72. kSDPGuestMask                    EQU        $01
  73. kSDPSpecificIdentityMask        EQU        $02
  74. kSDPLocalIdentityMask            EQU        $04
  75. ; typedef unsigned short                 SDPIdentityKind
  76.  
  77.  
  78. kSDPSuggestionOnly                EQU        0
  79. kSDPRestrictToDirectory            EQU        1
  80. kSDPRestrictToRecord            EQU        2
  81. ; typedef unsigned short                 SDPLoginFilterKind
  82.  
  83.  
  84.  
  85. ;  Panel Structures 
  86. ; 
  87. ;While the panel is in operation, four selection states may exist.
  88. ;    1) kSDPNothingSelected means nothing is selected.
  89. ;    2) kContainSelected means a volume, folder, catalog, dnode, or PAB is selected.
  90. ;    3) kSDPLockedContainerSelected means one of the above, but no access privledges.
  91. ;    4) kSDPRecordSelected means that a record is currently selected.
  92. ;
  93.  
  94. ;  Values of SDPSelectionState 
  95.  
  96. kSDPNothingSelected                EQU        0
  97. kSDPLockedContainerSelected        EQU        1
  98. kSDPContainerSelected            EQU        2
  99. kSDPRecordSelected                EQU        3
  100. kSDPRecordAliasSelected            EQU        4
  101. kSDPContainerAliasSelected        EQU        5
  102. ; typedef unsigned short                 SDPSelectionState
  103.  
  104.  
  105.  
  106. ; 
  107. ;This type informs the caller of the action the user took, either as the result
  108. ;of an event (as returned by SDPPanelEvent) or when SDPOpenSelectedItem is called.
  109. ;
  110. ;kSDPProcessed means that the event (or call to SDPOpenSelectedItem) resulted in no
  111. ;state change.
  112. ;
  113. ;kSDPSelectedAnItem indicates that the user wants to select the currently-hilited
  114. ;record. This is returned, for example, when a user double-clicks on a record.
  115. ;
  116. ;kSDPChangedSelection implies that the user clicked on a new item (which may mean
  117. ;that no item is selected).
  118. ;
  119.  
  120. ;  Values of SDPPanelState 
  121.  
  122. kSDPProcessed                    EQU        0
  123. kSDPSelectedAnItem                EQU        1
  124. kSDPChangedSelection            EQU        2
  125. ; typedef unsigned short                 SDPPanelState
  126.  
  127. ; 
  128. ;Your application may read any of the fields in a SDPPanelRecord, but it should
  129. ;use the appropriate routines to make changes to the records with the exception
  130. ;of the refCon field which your application may read or write at will.  Private
  131. ;information follows the SDPPanelRecord, so the handle must not be re-sized.
  132. ;
  133.  
  134. SDPPanelRecord            RECORD 0
  135. bounds                     ds        Rect            ; offset: $0 (0)
  136. visible                     ds.b    1                ; offset: $8 (8)
  137. enabled                     ds.b    1                ; offset: $9 (9)
  138. focused                     ds.b    1                ; offset: $A (10)
  139. padByte                     ds.b    1                ; offset: $B (11)
  140. identity                 ds.l    1                ; offset: $C (12)
  141. refCon                     ds.l    1                ; offset: $10 (16)
  142. listRect                 ds        Rect            ; offset: $14 (20)
  143. popupRect                 ds        Rect            ; offset: $1C (28)
  144. numberOfRows             ds.w    1                ; offset: $24 (36)
  145. rowHeight                 ds.w    1                ; offset: $26 (38)
  146. pabMode                     ds.b    1                ; offset: $28 (40)
  147. filler1                     ds.b    1                ; offset: $29 (41)
  148. sizeof                     EQU *                    ; size:   $2A (42)
  149.                         ENDR
  150. ; typedef struct SDPPanelRecord *        SDPPanelPtr
  151.  
  152. ; typedef SDPPanelPtr *                    SDPPanelHandle
  153.  
  154. ; typedef PanelBusyUPP                     PanelBusyProc
  155.  
  156. ;  Find Panel Structures 
  157.  
  158. kSDPItemIsSelectedBit            EQU        0
  159. kSDPFindTextExistsBit            EQU        1
  160. ;  Values of SDPFindPanelState 
  161.  
  162. kSDPItemIsSelectedMask            EQU        $01
  163. kSDPFindTextExistsMask            EQU        $02
  164. ; typedef unsigned short                 SDPFindPanelState
  165.  
  166. ;  Values of SDPFindPanelFocus 
  167.  
  168. kSDPFindPanelNoFocus            EQU        0
  169. kSDPFindPanelListHasFocus        EQU        1
  170. kSDPFindPanelTextHasFocus        EQU        2
  171. ; typedef unsigned short                 SDPFindPanelFocus
  172.  
  173.  
  174.  
  175. SDPFindPanelRecord        RECORD 0
  176. upperLeft                 ds        Point            ; offset: $0 (0)
  177. visible                     ds.b    1                ; offset: $4 (4)
  178. enabled                     ds.b    1                ; offset: $5 (5)
  179. nowFinding                 ds.b    1                ; offset: $6 (6)
  180. padByte                     ds.b    1                ; offset: $7 (7)
  181. currentFocus             ds.w    1                ; offset: $8 (8)
  182. identity                 ds.l    1                ; offset: $A (10)
  183. simultaneousSearchCount     ds.w    1                ; offset: $E (14)
  184. refCon                     ds.l    1                ; offset: $10 (16)
  185. sizeof                     EQU *                    ; size:   $14 (20)
  186.                         ENDR
  187. ; typedef struct SDPFindPanelRecord *    SDPFindPanelPtr
  188.  
  189. ; typedef SDPFindPanelPtr *                SDPFindPanelHandle
  190.  
  191. ;  Values of SDPFindPanelResult 
  192.  
  193. kSDPSelectedAFindItem            EQU        0
  194. kSDPFindSelectionChanged        EQU        1
  195. kSDPFindCompleted                EQU        2
  196. kSDPTextStateChanged            EQU        3
  197. kSDPFocusChanged                EQU        4
  198. kSDPSelectionAndFocusChanged    EQU        5
  199. kSDPMenuChanged                    EQU        6
  200. kSDPSelectionAndMenuChanged        EQU        7
  201. kSDPProcessedFind                EQU        8
  202. ; typedef unsigned short                 SDPFindPanelResult
  203.  
  204. ; typedef PackedPathNamePtr *            PackedRStringListHandle
  205.  
  206. ; typedef FindPanelBusyUPP                 FindPanelBusyProc
  207.  
  208. ;  Prompt For Identity Routines 
  209. ;
  210. ; pascal OSErr SDPPromptForID(AuthIdentity *id, ConstStr255Param guestPrompt, ConstStr255Param specificIDPrompt, ConstStr255Param localIDPrompt, const RString *recordType, SDPIdentityKind permittedKinds, SDPIdentityKind *selectedKind, const RecordID *loginFilter, SDPLoginFilterKind filterKind)
  211. ;
  212.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  213.         Macro
  214.         _SDPPromptForID
  215.             move.l              #$00100388,D0
  216.             dc.w                $AA5D
  217.         EndM
  218.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  219.         IMPORT_CFM_FUNCTION SDPPromptForID
  220.     ENDIF
  221.  
  222.  
  223.  
  224. ; 
  225. ;SDPNewPanel creates a new panel. You supply the window in which the panel
  226. ;is to live, the bounds for the panel (which includes both the menu and the list),
  227. ;whether or not the panel is to be initially visible, the initial RLI (nil for
  228. ;catalogs and volumes), the types of records that will be shown (only a single
  229. ;(non-nil) type which may contain wildcards), the identity by which to browse
  230. ;(for access control reasons), and a refCon which is  available to the caller.
  231. ;
  232.  
  233. ;
  234. ; pascal OSErr SDPNewPanel(SDPPanelHandle *newPanel, WindowPtr window, const Rect *bounds, Boolean visible, Boolean enabled, const PackedRLI *initialRLI, const RStringPtr *typesList, unsigned long typeCount, AuthIdentity identity, DirEnumChoices enumFlags, DirMatchWith matchTypeHow, long refCon)
  235. ;
  236.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  237.         Macro
  238.         _SDPNewPanel
  239.             move.l              #$00150064,D0
  240.             dc.w                $AA5D
  241.         EndM
  242.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  243.         IMPORT_CFM_FUNCTION SDPNewPanel
  244.     ENDIF
  245.  
  246.  
  247. ; 
  248. ;SDPSetIdentity Sets the identity used for browsing.  NOTE: This call is likely to go
  249. ;away if the new authentication scheme works.
  250. ;
  251.  
  252. ;
  253. ; pascal OSErr SDPSetIdentity(SDPPanelHandle panel, AuthIdentity identity)
  254. ;
  255.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  256.         Macro
  257.         _SDPSetIdentity
  258.             move.l              #$00040073,D0
  259.             dc.w                $AA5D
  260.         EndM
  261.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  262.         IMPORT_CFM_FUNCTION SDPSetIdentity
  263.     ENDIF
  264.  
  265.  
  266.  
  267.  
  268. ; 
  269. ;SDPGetNewPanel is similar to SDPNewPanel above, except it takes a resource id of a
  270. ;'panl' resource.
  271. ;
  272.  
  273. ;
  274. ; pascal OSErr SDPGetNewPanel(SDPPanelHandle *newPanel, short resourceID, WindowPtr window, const PackedRLI *initialRLI, AuthIdentity identity)
  275. ;
  276.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  277.         Macro
  278.         _SDPGetNewPanel
  279.             move.l              #$00090065,D0
  280.             dc.w                $AA5D
  281.         EndM
  282.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  283.         IMPORT_CFM_FUNCTION SDPGetNewPanel
  284.     ENDIF
  285.  
  286.  
  287. ; 
  288. ;Call this when you're completely done with a panel. It deallocates all of the
  289. ;associated data structures.
  290. ;
  291.  
  292. ;
  293. ; pascal OSErr SDPDisposePanel(SDPPanelHandle panel)
  294. ;
  295.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  296.         Macro
  297.         _SDPDisposePanel
  298.             move.l              #$00020066,D0
  299.             dc.w                $AA5D
  300.         EndM
  301.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  302.         IMPORT_CFM_FUNCTION SDPDisposePanel
  303.     ENDIF
  304.  
  305.  
  306. ; 
  307. ;If the panel is visible, it makes it invisible by hiding the menu, turning off
  308. ;drawing of the list, and erasing and  invaling the list's rectangle.
  309. ;
  310.  
  311. ;
  312. ; pascal OSErr SDPHidePanel(SDPPanelHandle panel)
  313. ;
  314.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  315.         Macro
  316.         _SDPHidePanel
  317.             move.l              #$00020067,D0
  318.             dc.w                $AA5D
  319.         EndM
  320.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  321.         IMPORT_CFM_FUNCTION SDPHidePanel
  322.     ENDIF
  323.  
  324.  
  325. ;  If the panel is invisible, it makes it visible and draws it. 
  326. ;
  327. ; pascal OSErr SDPShowPanel(SDPPanelHandle panel)
  328. ;
  329.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  330.         Macro
  331.         _SDPShowPanel
  332.             move.l              #$00020068,D0
  333.             dc.w                $AA5D
  334.         EndM
  335.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  336.         IMPORT_CFM_FUNCTION SDPShowPanel
  337.     ENDIF
  338.  
  339.  
  340. ;  Disables the list and menu so that it won't accept any commands. 
  341. ;
  342. ; pascal OSErr SDPEnablePanel(SDPPanelHandle panel, Boolean enable)
  343. ;
  344.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  345.         Macro
  346.         _SDPEnablePanel
  347.             move.l              #$00030069,D0
  348.             dc.w                $AA5D
  349.         EndM
  350.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  351.         IMPORT_CFM_FUNCTION SDPEnablePanel
  352.     ENDIF
  353.  
  354. ; 
  355. ;Move the upper-left-hand corner of the panel to (h,v), given in local coordinates of
  356. ;the panel's window.
  357. ;
  358.  
  359. ;
  360. ; pascal OSErr SDPMovePanel(SDPPanelHandle panel, short h, short v)
  361. ;
  362.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  363.         Macro
  364.         _SDPMovePanel
  365.             move.l              #$0004006B,D0
  366.             dc.w                $AA5D
  367.         EndM
  368.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  369.         IMPORT_CFM_FUNCTION SDPMovePanel
  370.     ENDIF
  371.  
  372.  
  373. ; 
  374. ;Resizes the panel to have the given width and height (keeping the upper-left-hand
  375. ;corner in a fixed position).
  376. ;
  377.  
  378. ;
  379. ; pascal OSErr SDPSizePanel(SDPPanelHandle panel, short width, short height)
  380. ;
  381.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  382.         Macro
  383.         _SDPSizePanel
  384.             move.l              #$0004006C,D0
  385.             dc.w                $AA5D
  386.         EndM
  387.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  388.         IMPORT_CFM_FUNCTION SDPSizePanel
  389.     ENDIF
  390.  
  391.  
  392. ; 
  393. ;This routine simulates a double-click on the selected item (if there is no selected
  394. ;item, then it does nothing), and it returns the result of that "double-click" via the
  395. ;whatHappened parameter. If a container is selected, then that container will be
  396. ;opened and kMovedDownTheHierarchy is returned. If, however, the user is at the lowest
  397. ;level in the hierarchy, then kSDPSelectedAnItem is returned.
  398. ;
  399.  
  400. ;
  401. ; pascal OSErr SDPOpenSelectedItem(SDPPanelHandle panel, SDPPanelState *whatHappened)
  402. ;
  403.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  404.         Macro
  405.         _SDPOpenSelectedItem
  406.             move.l              #$0004006D,D0
  407.             dc.w                $AA5D
  408.         EndM
  409.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  410.         IMPORT_CFM_FUNCTION SDPOpenSelectedItem
  411.     ENDIF
  412.  
  413.  
  414. ; 
  415. ;Returns whether a record is selected, something else is selected, or nothing is
  416. ;selected.
  417. ;
  418.  
  419. ;
  420. ; pascal OSErr SDPGetPanelSelectionState(SDPPanelHandle panel, SDPSelectionState *itsState)
  421. ;
  422.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  423.         Macro
  424.         _SDPGetPanelSelectionState
  425.             move.l              #$0004006E,D0
  426.             dc.w                $AA5D
  427.         EndM
  428.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  429.         IMPORT_CFM_FUNCTION SDPGetPanelSelectionState
  430.     ENDIF
  431.  
  432.  
  433. ; 
  434. ;Returns the size of the currently-selected DSSpec, or zero if a record is
  435. ;not selected.  It is safe to do a NewPtr (SDPGetPanelSelectionSize (...))
  436. ;
  437.  
  438. ;
  439. ; pascal OSErr SDPGetPanelSelectionSize(SDPPanelHandle panel, unsigned short *dsSpecSize)
  440. ;
  441.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  442.         Macro
  443.         _SDPGetPanelSelectionSize
  444.             move.l              #$00040072,D0
  445.             dc.w                $AA5D
  446.         EndM
  447.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  448.         IMPORT_CFM_FUNCTION SDPGetPanelSelectionSize
  449.     ENDIF
  450.  
  451.  
  452. ; 
  453. ;Returns the currently-selected DSSpec, or a zero-lengthed
  454. ;DSSpec if a record is not selected. It is assumed that the selection
  455. ;buffer allocated is large enough.
  456. ;
  457.  
  458. ;
  459. ; pascal OSErr SDPGetPanelSelection(SDPPanelHandle panel, PackedDSSpec *selection)
  460. ;
  461.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  462.         Macro
  463.         _SDPGetPanelSelection
  464.             move.l              #$0004006F,D0
  465.             dc.w                $AA5D
  466.         EndM
  467.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  468.         IMPORT_CFM_FUNCTION SDPGetPanelSelection
  469.     ENDIF
  470.  
  471.  
  472. ; 
  473. ;Forces browsing to the specified RLI. If prli is the current RLI, then it does
  474. ;nothing.
  475. ;
  476.  
  477. ;
  478. ; pascal OSErr SDPSetPath(SDPPanelHandle panel, const PackedRLI *prli)
  479. ;
  480.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  481.         Macro
  482.         _SDPSetPath
  483.             move.l              #$00040070,D0
  484.             dc.w                $AA5D
  485.         EndM
  486.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  487.         IMPORT_CFM_FUNCTION SDPSetPath
  488.     ENDIF
  489.  
  490.  
  491. ; 
  492. ;This is the main driver for the panel.  You should pass all events to SDPPanelEvent
  493. ;including NULL events.  If you have more than 1 panel, you will need to
  494. ;call SDPPanelEvent for each panel.  NOTE:  For Update Events you will also need to call
  495. ;SDPUpdatePanel as described below.
  496. ;
  497.  
  498. ;
  499. ; pascal OSErr SDPPanelEvent(SDPPanelHandle panel, const EventRecord *theEvent, SDPPanelState *whatHappened)
  500. ;
  501.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  502.         Macro
  503.         _SDPPanelEvent
  504.             move.l              #$00060071,D0
  505.             dc.w                $AA5D
  506.         EndM
  507.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  508.         IMPORT_CFM_FUNCTION SDPPanelEvent
  509.     ENDIF
  510.  
  511.  
  512.  
  513. ; 
  514. ;SDPUpdatePanel should be called in response to an update event.  Generally you will
  515. ;have first called BeginUpdate, and pass the windows visRgn as theRgn.  If NULL
  516. ;is passed for theRgn the entire panel is re-drawn.  NOTE:  Drawing is not cliped to
  517. ;theRgn, if this is desired, you must first call SetClip.
  518. ;
  519.  
  520. ;
  521. ; pascal OSErr SDPUpdatePanel(SDPPanelHandle panel, RgnHandle theRgn)
  522. ;
  523.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  524.         Macro
  525.         _SDPUpdatePanel
  526.             move.l              #$0004006A,D0
  527.             dc.w                $AA5D
  528.         EndM
  529.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  530.         IMPORT_CFM_FUNCTION SDPUpdatePanel
  531.     ENDIF
  532.  
  533.  
  534. ; 
  535. ;SDPSelectString scrolls and selects the closest matching string at the current
  536. ;level.  This is the same behavior as if the user typed in the given string.
  537. ;
  538.  
  539. ;
  540. ; pascal OSErr SDPSelectString(SDPPanelHandle panel, const RString *name)
  541. ;
  542.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  543.         Macro
  544.         _SDPSelectString
  545.             move.l              #$00040074,D0
  546.             dc.w                $AA5D
  547.         EndM
  548.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  549.         IMPORT_CFM_FUNCTION SDPSelectString
  550.     ENDIF
  551.  
  552. ; 
  553. ;SDPGetPathLength returns the length in bytes required to hold the current path name
  554. ;in RLI format.  This corresponds to the path name in the popup menu.
  555. ;
  556.  
  557. ;
  558. ; pascal OSErr SDPGetPathLength(SDPPanelHandle panel, unsigned short *pathNameLength)
  559. ;
  560.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  561.         Macro
  562.         _SDPGetPathLength
  563.             move.l              #$00040075,D0
  564.             dc.w                $AA5D
  565.         EndM
  566.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  567.         IMPORT_CFM_FUNCTION SDPGetPathLength
  568.     ENDIF
  569.  
  570. ;  SDPGetPath returns the current rli. 
  571. ;
  572. ; pascal OSErr SDPGetPath(SDPPanelHandle panel, PackedRLI *prli, short *dsRefNum)
  573. ;
  574.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  575.         Macro
  576.         _SDPGetPath
  577.             move.l              #$00060076,D0
  578.             dc.w                $AA5D
  579.         EndM
  580.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  581.         IMPORT_CFM_FUNCTION SDPGetPath
  582.     ENDIF
  583.  
  584. ; 
  585. ;SDPSetFocus will draw the focus rectangle or erase the focus rectangle depending upon
  586. ;the focus boolean.
  587. ;
  588.  
  589. ;
  590. ; pascal OSErr SDPSetFocus(SDPPanelHandle panel, Boolean focus)
  591. ;
  592.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  593.         Macro
  594.         _SDPSetFocus
  595.             move.l              #$00030077,D0
  596.             dc.w                $AA5D
  597.         EndM
  598.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  599.         IMPORT_CFM_FUNCTION SDPSetFocus
  600.     ENDIF
  601.  
  602. ; 
  603. ;SDPSetPanelBalloonHelp allows clients to specify a STR# resource id to use for 
  604. ;balloon help.  Balloon help is unavailable until this call is made.
  605. ;
  606.  
  607. ;
  608. ; pascal OSErr SDPSetPanelBalloonHelp(SDPPanelHandle panel, short balloonHelpID)
  609. ;
  610.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  611.         Macro
  612.         _SDPSetPanelBalloonHelp
  613.             move.l              #$00030078,D0
  614.             dc.w                $AA5D
  615.         EndM
  616.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  617.         IMPORT_CFM_FUNCTION SDPSetPanelBalloonHelp
  618.     ENDIF
  619.  
  620. ; 
  621. ;SDPInstallPanelBusyProc allows clients to install a CB that will be called while
  622. ;the panel is aynchronously busy.
  623. ;
  624.  
  625. ;
  626. ; pascal OSErr SDPInstallPanelBusyProc(SDPPanelHandle panel, PanelBusyProc busyProc)
  627. ;
  628.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  629.         Macro
  630.         _SDPInstallPanelBusyProc
  631.             move.l              #$00040079,D0
  632.             dc.w                $AA5D
  633.         EndM
  634.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  635.         IMPORT_CFM_FUNCTION SDPInstallPanelBusyProc
  636.     ENDIF
  637.  
  638.  
  639. ;
  640. ; pascal OSErr SDPNewFindPanel(SDPFindPanelHandle *newPanel, WindowPtr window, Point upperLeft, short layoutResourceID, Boolean visible, Boolean enabled, const RStringPtr *typesList, long typeCount, DirMatchWith matchTypeHow, AuthIdentity identity, short simultaneousSearchCount, SDPFindPanelFocus initialFocus, long refCon)
  641. ;
  642.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  643.         Macro
  644.         _SDPNewFindPanel
  645.             move.l              #$001408FC,D0
  646.             dc.w                $AA5D
  647.         EndM
  648.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  649.         IMPORT_CFM_FUNCTION SDPNewFindPanel
  650.     ENDIF
  651.  
  652. ;
  653. ; pascal OSErr SDPDisposeFindPanel(SDPFindPanelHandle findPanel)
  654. ;
  655.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  656.         Macro
  657.         _SDPDisposeFindPanel
  658.             move.l              #$000208FD,D0
  659.             dc.w                $AA5D
  660.         EndM
  661.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  662.         IMPORT_CFM_FUNCTION SDPDisposeFindPanel
  663.     ENDIF
  664.  
  665. ;
  666. ; pascal OSErr SDPStartFind(SDPFindPanelHandle findPanel)
  667. ;
  668.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  669.         Macro
  670.         _SDPStartFind
  671.             move.l              #$000208FE,D0
  672.             dc.w                $AA5D
  673.         EndM
  674.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  675.         IMPORT_CFM_FUNCTION SDPStartFind
  676.     ENDIF
  677.  
  678. ;
  679. ; pascal OSErr SDPStopFind(SDPFindPanelHandle findPanel)
  680. ;
  681.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  682.         Macro
  683.         _SDPStopFind
  684.             move.l              #$000208FF,D0
  685.             dc.w                $AA5D
  686.         EndM
  687.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  688.         IMPORT_CFM_FUNCTION SDPStopFind
  689.     ENDIF
  690.  
  691. ;
  692. ; pascal OSErr SDPFindPanelEvent(SDPFindPanelHandle findPanel, const EventRecord *event, SDPFindPanelResult *whatHappened)
  693. ;
  694.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  695.         Macro
  696.         _SDPFindPanelEvent
  697.             move.l              #$00060900,D0
  698.             dc.w                $AA5D
  699.         EndM
  700.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  701.         IMPORT_CFM_FUNCTION SDPFindPanelEvent
  702.     ENDIF
  703.  
  704. ;
  705. ; pascal OSErr SDPUpdateFindPanel(SDPFindPanelHandle findPanel, RgnHandle theRgn)
  706. ;
  707.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  708.         Macro
  709.         _SDPUpdateFindPanel
  710.             move.l              #$00040901,D0
  711.             dc.w                $AA5D
  712.         EndM
  713.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  714.         IMPORT_CFM_FUNCTION SDPUpdateFindPanel
  715.     ENDIF
  716.  
  717. ;
  718. ; pascal OSErr SDPShowFindPanel(SDPFindPanelHandle findPanel)
  719. ;
  720.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  721.         Macro
  722.         _SDPShowFindPanel
  723.             move.l              #$00020902,D0
  724.             dc.w                $AA5D
  725.         EndM
  726.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  727.         IMPORT_CFM_FUNCTION SDPShowFindPanel
  728.     ENDIF
  729.  
  730. ;
  731. ; pascal OSErr SDPHideFindPanel(SDPFindPanelHandle findPanel)
  732. ;
  733.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  734.         Macro
  735.         _SDPHideFindPanel
  736.             move.l              #$00020903,D0
  737.             dc.w                $AA5D
  738.         EndM
  739.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  740.         IMPORT_CFM_FUNCTION SDPHideFindPanel
  741.     ENDIF
  742.  
  743. ;
  744. ; pascal OSErr SDPMoveFindPanel(SDPFindPanelHandle findPanel, short h, short v)
  745. ;
  746.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  747.         Macro
  748.         _SDPMoveFindPanel
  749.             move.l              #$00040904,D0
  750.             dc.w                $AA5D
  751.         EndM
  752.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  753.         IMPORT_CFM_FUNCTION SDPMoveFindPanel
  754.     ENDIF
  755.  
  756. ;
  757. ; pascal OSErr SDPEnableFindPanel(SDPFindPanelHandle findPanel, Boolean enabled)
  758. ;
  759.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  760.         Macro
  761.         _SDPEnableFindPanel
  762.             move.l              #$00030905,D0
  763.             dc.w                $AA5D
  764.         EndM
  765.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  766.         IMPORT_CFM_FUNCTION SDPEnableFindPanel
  767.     ENDIF
  768.  
  769. ;
  770. ; pascal OSErr SDPSetFindPanelFocus(SDPFindPanelHandle findPanel, SDPFindPanelFocus newFocus)
  771. ;
  772.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  773.         Macro
  774.         _SDPSetFindPanelFocus
  775.             move.l              #$00030906,D0
  776.             dc.w                $AA5D
  777.         EndM
  778.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  779.         IMPORT_CFM_FUNCTION SDPSetFindPanelFocus
  780.     ENDIF
  781.  
  782. ;
  783. ; pascal OSErr SDPGetFindPanelState(SDPFindPanelHandle findPanel, SDPFindPanelState *itsState)
  784. ;
  785.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  786.         Macro
  787.         _SDPGetFindPanelState
  788.             move.l              #$00040907,D0
  789.             dc.w                $AA5D
  790.         EndM
  791.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  792.         IMPORT_CFM_FUNCTION SDPGetFindPanelState
  793.     ENDIF
  794.  
  795. ;
  796. ; pascal OSErr SDPGetFindPanelSelectionSize(SDPFindPanelHandle findPanel, unsigned short *size)
  797. ;
  798.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  799.         Macro
  800.         _SDPGetFindPanelSelectionSize
  801.             move.l              #$00040908,D0
  802.             dc.w                $AA5D
  803.         EndM
  804.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  805.         IMPORT_CFM_FUNCTION SDPGetFindPanelSelectionSize
  806.     ENDIF
  807.  
  808. ;
  809. ; pascal OSErr SDPGetFindPanelSelection(SDPFindPanelHandle findPanel, PackedDSSpec *selection)
  810. ;
  811.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  812.         Macro
  813.         _SDPGetFindPanelSelection
  814.             move.l              #$00040909,D0
  815.             dc.w                $AA5D
  816.         EndM
  817.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  818.         IMPORT_CFM_FUNCTION SDPGetFindPanelSelection
  819.     ENDIF
  820.  
  821. ;
  822. ; pascal OSErr SDPSetFindPanelBalloonHelp(SDPFindPanelHandle findPanel, short balloonHelpID)
  823. ;
  824.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  825.         Macro
  826.         _SDPSetFindPanelBalloonHelp
  827.             move.l              #$0003090A,D0
  828.             dc.w                $AA5D
  829.         EndM
  830.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  831.         IMPORT_CFM_FUNCTION SDPSetFindPanelBalloonHelp
  832.     ENDIF
  833.  
  834. ;
  835. ; pascal OSErr SDPSetFindIdentity(SDPFindPanelHandle findPanel, AuthIdentity identity)
  836. ;
  837.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  838.         Macro
  839.         _SDPSetFindIdentity
  840.             move.l              #$0004090B,D0
  841.             dc.w                $AA5D
  842.         EndM
  843.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  844.         IMPORT_CFM_FUNCTION SDPSetFindIdentity
  845.     ENDIF
  846.  
  847. ;
  848. ; pascal OSErr SDPInstallFindPanelBusyProc(SDPFindPanelHandle findPanel, FindPanelBusyProc busyProc)
  849. ;
  850.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  851.         Macro
  852.         _SDPInstallFindPanelBusyProc
  853.             move.l              #$0004090C,D0
  854.             dc.w                $AA5D
  855.         EndM
  856.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  857.         IMPORT_CFM_FUNCTION SDPInstallFindPanelBusyProc
  858.     ENDIF
  859.  
  860.  
  861.  
  862. ;
  863. ; pascal OSErr SDPGetIconByType(const RString *recordType, IconSelectorValue whichIcons, Handle *iconSuite)
  864. ;
  865.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  866.         Macro
  867.         _SDPGetIconByType
  868.             move.w              #$0400,D0
  869.             dc.w                $AA5C
  870.         EndM
  871.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  872.         IMPORT_CFM_FUNCTION SDPGetIconByType
  873.     ENDIF
  874.  
  875. ;
  876. ; pascal OSErr SDPGetDSSpecIcon(const PackedDSSpec *packedDSSpec, IconSelectorValue whichIcons, Handle *iconSuite)
  877. ;
  878.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  879.         Macro
  880.         _SDPGetDSSpecIcon
  881.             move.w              #$0401,D0
  882.             dc.w                $AA5C
  883.         EndM
  884.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  885.         IMPORT_CFM_FUNCTION SDPGetDSSpecIcon
  886.     ENDIF
  887.  
  888. ;
  889. ; pascal OSErr SDPGetCategories(PackedRStringListHandle *categories, PackedRStringListHandle *displayNames)
  890. ;
  891.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  892.         Macro
  893.         _SDPGetCategories
  894.             move.w              #$0402,D0
  895.             dc.w                $AA5C
  896.         EndM
  897.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  898.         IMPORT_CFM_FUNCTION SDPGetCategories
  899.     ENDIF
  900.  
  901. ;
  902. ; pascal OSErr SDPGetCategoryTypes(const RString *category, PackedRStringListHandle *types)
  903. ;
  904.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  905.         Macro
  906.         _SDPGetCategoryTypes
  907.             move.w              #$0403,D0
  908.             dc.w                $AA5C
  909.         EndM
  910.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  911.         IMPORT_CFM_FUNCTION SDPGetCategoryTypes
  912.     ENDIF
  913.  
  914.  
  915.  
  916.  
  917. ;
  918. ; pascal OSErr SDPResolveAliasFile(FSSpecPtr fileSpec, PackedDSSpecHandle resolvedDSSpec, AuthIdentity identity, Boolean mayPromptUser)
  919. ;
  920.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  921.         Macro
  922.         _SDPResolveAliasFile
  923.             move.l              #$00070E74,D0
  924.             dc.w                $AA5D
  925.         EndM
  926.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  927.         IMPORT_CFM_FUNCTION SDPResolveAliasFile
  928.     ENDIF
  929.  
  930. ;
  931. ; pascal OSErr SDPResolveAliasDSSpec(PackedDSSpecHandle theAliasDSSpec, AuthIdentity identity, Boolean mayPromptUser)
  932. ;
  933.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  934.         Macro
  935.         _SDPResolveAliasDSSpec
  936.             move.l              #$00050E75,D0
  937.             dc.w                $AA5D
  938.         EndM
  939.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  940.         IMPORT_CFM_FUNCTION SDPResolveAliasDSSpec
  941.     ENDIF
  942.  
  943. ;
  944. ; pascal OSErr SDPRepairPersonalDirectory(FSSpec *pd, Boolean showProgress)
  945. ;
  946.     IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
  947.         Macro
  948.         _SDPRepairPersonalDirectory
  949.             move.l              #$00031A2C,D0
  950.             dc.w                $AA5D
  951.         EndM
  952.     ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
  953.         IMPORT_CFM_FUNCTION SDPRepairPersonalDirectory
  954.     ENDIF
  955.  
  956.  
  957.     ENDIF ; __OCESTANDARDDIRECTORY__ 
  958.  
  959.